home *** CD-ROM | disk | FTP | other *** search
/ Interactive Media Design Review 1999 / Interactive Media Design Review 1999.iso / pc / allfiles / angry / scene3_4.dir / 00231_back to intro button.ls < prev    next >
Encoding:
Text File  |  1999-03-01  |  447 b   |  27 lines
  1. on mouseWithin me
  2.   cursor([member("pointy").memberNum, member("pointy_mask").memberNum])
  3. end
  4.  
  5. on mouseLeave me
  6.   cursor(-1)
  7. end
  8.  
  9. on mouseDown me
  10.   repeat with x = 1 to 6
  11.     if soundBusy(x) then
  12.       set the volume of sound x to 255
  13.       sound stop x
  14.     end if
  15.   end repeat
  16.   puppetSprite(7, 0)
  17.   sprite(7).visible = 0
  18.   puppetSprite(8, 0)
  19.   sprite(8).visible = 0
  20.   cursor(200)
  21. end
  22.  
  23. on mouseUp me
  24.   cursor(-1)
  25.   go("welcomeBack", "intro")
  26. end
  27.